home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / languages / pcq_incl3v1.lha / Libraries / Expansion.i < prev    next >
Encoding:
Text File  |  1994-04-15  |  1.3 KB  |  51 lines

  1. {
  2.         Expansion.i for PCQ Pascal
  3.  
  4.         external definitions for expansion.library
  5. }
  6.  
  7. Const
  8.     EXPANSIONNAME       = "expansion.library";
  9.  
  10. { flags for the AddDosNode() call }
  11.     ADNB_STARTPROC      = 0;
  12.  
  13.     ADNF_STARTPROC      = 1;
  14.  
  15. Var
  16.     ExpansionBase : Address;
  17.  
  18. FUNCTION AddBootNode(BootPri : Byte; flags : Integer; dvNode : Address; ConfDev : Address) : Boolean;
  19.     External;                                        { dvNode is a DeviceNodePtr, ConfDev is a ConfigDevPtr }
  20.  
  21. Function AddDosNode(bootPri : Short; flags : Short;
  22.                         deviceNode : Address) : Boolean;
  23.     External;
  24.     { deviceNode is actually a DeviceNodePtr }
  25.  
  26. Function AllocBoardMem(slotSpec : Short) : Short;
  27.     External;
  28.  
  29. Function AllocExpansionMem(numSlots, slotOffset : Short) : Short;
  30.     External;
  31.  
  32. Procedure FreeBoardMem(startSlot, slotSpec : Short);
  33.     External;
  34.  
  35. Procedure FreeExpansionMem(startSlot, numSlots : Short);
  36.     External;
  37.  
  38. Function MakeDosNode(parameterPkt : Address) : Address; { DeviceNodePtr }
  39.     External;
  40.  
  41. Function ReadExpansionByte(board : Address; offset : Integer) : Short;
  42.     External;
  43.  
  44. Function ReadExpansionRom(board : Address; configDev : Address) : Boolean;
  45.     External;
  46.  
  47. Function WriteExpansionByte(board : Address; offset : Integer;
  48.                                 value : Byte) : Boolean;
  49.     External;
  50.  
  51.